home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 November: Tool Chest / Dev.CD Nov 00 TC Disk 1.toast / Sample Code / Contributed / SpriteWorld / SpriteWorld Files / BlitPixie / Assembler / 68K / BlitPixieDoubled.a < prev    next >
Encoding:
Text File  |  2000-10-06  |  1.9 KB  |  93 lines  |  [TEXT/MPS ]
  1. ; DO NOT EDIT (OR EVEN READ) THIS FILE!
  2. ; BlitPixieDoubled.a (for Asm), auto-generated from BlitPixieDoubled.c
  3.  
  4.     INCLUDE    'AsmGlobal.a'
  5.  
  6.     PROC
  7.  
  8.     EXPORT BlitPixieDoubled8Bit 
  9. BlitPixieDoubled8Bit:
  10.     link      a6,#0
  11.     movem.l   d3-d7/a2,-(a7)
  12.     movem.l   8(a6),a0-a1
  13.     movem.l   16(a6),d3-d6
  14.     andi.w    #$fffc,d5
  15.     movea.l   a1,a2
  16.     adda.l    d4,a2
  17.     sub.l     d5,d3
  18.     sub.l     d5,d4
  19.     add.l     d4,d4
  20.     lsr.w     #2,d5
  21.     swap      d6
  22.     move.w    d5,d6
  23.     move.l    (a0)+,d0
  24.     move.l    d0,d1
  25.     lsr.l     #8,d0
  26.     lsr.w     #8,d0
  27.     move.l    d0,d7
  28.     lsl.l     #8,d7
  29.     or.l      d0,d7
  30.     move.l    d7,(a1)+
  31.     move.l    d7,(a2)+
  32.     swap      d1
  33.     lsr.l     #8,d1
  34.     lsr.w     #8,d1
  35.     move.l    d1,d7
  36.     lsl.l     #8,d7
  37.     or.l      d1,d7
  38.     move.l    d7,(a1)+
  39.     move.l    d7,(a2)+
  40.     subq.w    #1,d6
  41.     bne.s     *-36           ; $00000028
  42.     adda.l    d3,a0
  43.     adda.l    d4,a1
  44.     adda.l    d4,a2
  45.     sub.l     #65536,d6
  46.     bne.s     *-52           ; $00000026
  47.     movem.l   (a7)+,d3-d7/a2
  48.     unlk      a6
  49.     rts
  50.  
  51.     EXPORT BlitPixieDoubled16Bit 
  52. BlitPixieDoubled16Bit:
  53.     link      a6,#0
  54.     movem.l   d3-d7/a2,-(a7)
  55.     movem.l   8(a6),a0-a1
  56.     movem.l   16(a6),d3-d6
  57.     andi.w    #$fffc,d5
  58.     movea.l   a1,a2
  59.     adda.l    d4,a2
  60.     sub.l     d5,d3
  61.     sub.l     d5,d3
  62.     sub.l     d5,d4
  63.     sub.l     d5,d4
  64.     add.l     d4,d4
  65.     lsr.w     #1,d5
  66.     swap      d6
  67.     move.w    d5,d6
  68.     move.l    (a0)+,d0
  69.     move.l    d0,d1
  70.     swap      d0
  71.     move.w    d0,d7
  72.     swap      d7
  73.     move.w    d0,d7
  74.     move.l    d7,(a1)+
  75.     move.l    d7,(a2)+
  76.     swap      d1
  77.     move.w    d1,d7
  78.     swap      d7
  79.     move.w    d1,d7
  80.     move.l    d7,(a1)+
  81.     move.l    d7,(a2)+
  82.     subq.w    #1,d6
  83.     bne.s     *-30           ; $0000002c
  84.     adda.l    d3,a0
  85.     adda.l    d4,a1
  86.     adda.l    d4,a2
  87.     sub.l     #65536,d6
  88.     bne.s     *-46           ; $0000002a
  89.     movem.l   (a7)+,d3-d7/a2
  90.     unlk      a6
  91.     rts
  92.     END
  93.